home *** CD-ROM | disk | FTP | other *** search
/ Resource Library: Multimedia / Resource Library: Multimedia.iso / hypercrd / stckdnws.hqx / Stacked News ƒ / NewsArchive / cards.xml < prev    next >
Text File  |  1992-02-17  |  3KB  |  85 lines
  1. card_13732.xml
  2. <?xml version="1.0" encoding="utf-8" ?>
  3. <!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
  4. <card>
  5.     <id>13732</id>
  6.     <filler1>0</filler1>
  7.     <cantDelete> <false /> </cantDelete>
  8.     <showPict> <true /> </showPict>
  9.     <dontSearch> <false /> </dontSearch>
  10.     <owner>2649</owner>
  11.     <link rel="stylesheet" type="text/css" href="stylesheet_3182.css" />
  12.     <content>
  13.         <layer>background</layer>
  14.         <id>3</id>
  15.         <text>dummy group</text>
  16.     </content>
  17.     <content>
  18.         <layer>background</layer>
  19.         <id>4</id>
  20.         <text>dummy subject</text>
  21.     </content>
  22.     <content>
  23.         <layer>background</layer>
  24.         <id>2</id>
  25.         <text>              Delete this card once you have real material stored in this stack !</text>
  26.     </content>
  27.     <name></name>
  28.     <script></script>
  29. </card>
  30.  
  31.  
  32. card_8551.xml
  33. <?xml version="1.0" encoding="utf-8" ?>
  34. <!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
  35. <card>
  36.     <id>8551</id>
  37.     <filler1>0</filler1>
  38.     <cantDelete> <true /> </cantDelete>
  39.     <showPict> <true /> </showPict>
  40.     <dontSearch> <true /> </dontSearch>
  41.     <owner>8215</owner>
  42.     <link rel="stylesheet" type="text/css" href="stylesheet_3182.css" />
  43.     <part>
  44.         <id>1</id>
  45.         <type>field</type>
  46.         <visible> <true /> </visible>
  47.         <dontWrap> <false /> </dontWrap>
  48.         <dontSearch> <false /> </dontSearch>
  49.         <sharedText> <false /> </sharedText>
  50.         <fixedLineHeight> <false /> </fixedLineHeight>
  51.         <autoTab> <false /> </autoTab>
  52.         <lockText> <true /> </lockText>
  53.         <rect>
  54.             <left>20</left>
  55.             <top>17</top>
  56.             <right>493</right>
  57.             <bottom>322</bottom>
  58.         </rect>
  59.         <style>scrolling</style>
  60.         <autoSelect> <false /> </autoSelect>
  61.         <showLines> <false /> </showLines>
  62.         <wideMargins> <false /> </wideMargins>
  63.         <multipleLines> <false /> </multipleLines>
  64.         <reservedFamily> 0 </reservedFamily>
  65.         <titleWidth>0</titleWidth>
  66.         <icon>0</icon>
  67.         <textAlign>left</textAlign>
  68.         <font>Geneva</font>
  69.         <textSize>10</textSize>
  70.         <textStyle>plain</textStyle>
  71.         <textHeight>13</textHeight>
  72.         <name>Index</name>
  73.         <script>on mouseUpget the value of the clickLineif first char of it is "┬á" thendelete first char of itfind it in field "Subject"else find it in field "Group"end mouseUpon mouseEnterHCBalloon "Click a line to go to the group or topic."end mouseEnter</script>
  74.     </part>
  75.     <content>
  76.         <layer>card</layer>
  77.         <id>1</id>
  78.         <text><span class="style2">ummy group</span><span class="style1">┬ádummy subject</span></text>
  79.     </content>
  80.     <name>Index</name>
  81.     <script>on openCardif the marked of this card thenunmark this cardupdateIndexend ifend openCardon updateIndexsort by sortOrder()lock screenpush cardput empty into lastSubjectput empty into lastGroupput empty into cd field "Index"repeat for number of cards - 1set cursor to busygo to next cardget field "Group"if it is not lastGroup thenput it into lastGroupput empty into lastSubjectput it & return after cd field "Index" of card "Index"set textStyle of last line of cd field "Index" of card "Index" to boldend ifget field "Subject"if first word of it is "Re:" then delete first word of itif it is not lastSubject thenput it into lastSubjectput "┬á" & it & return after cd field "Index" of card "Index"end ifend repeatpop cardunlock screenend updateIndex</script>
  82. </card>
  83.  
  84.  
  85.